      BLOCK DATA
C     ******************************************************
C     *                                                    *
C     *   BLOCK DATA 6                                     *
C     *                                                    *
C     ******************************************************
      IMPLICIT REAL*8(A-H,O-Z)
C
      REAL*4 DK23,DK24,DK33,DK34,DK21,DK22,DK31,DK32
C
      COMMON/TWIFCM/DK23(3,3,2),DK24(3,3,2),DK33(3,3,3,2)
     1             ,DK34(3,3,3,2),DK21(40,3,3),DK22(40,3,3)
     2             ,DK31(40,3,3,3),DK32(40,3,3,3)
C
      REAL*4 VK211(80),VK212(80),VK213(80),VK214(40),VK311(80),VK312(80)
      REAL*4 VK313(80),VK314(80),VK315(80),VK316(80),VK317(80),VK318(80)
      REAL*4 VK319(80),VK31A(80),VK31B(80),VK31C(80),VK31D(40)
      REAL*4 VK221(80),VK222(80),VK223(80),VK224(40),VK321(80),VK322(80)
      REAL*4 VK323(80),VK324(80),VK325(80),VK326(80),VK327(80),VK328(80)
      REAL*4 VK329(80),VK32A(80),VK32B(80),VK32C(80),VK32D(40)
C
      EQUIVALENCE (DK21(1,3,1),VK211(1)),(DK21(1,2,2),VK212(1))
      EQUIVALENCE (DK21(1,1,3),VK213(1)),(DK21(1,3,3),VK214(1))
      EQUIVALENCE (DK22(1,3,1),VK221(1)),(DK22(1,2,2),VK222(1))
      EQUIVALENCE (DK22(1,1,3),VK223(1)),(DK22(1,3,3),VK224(1))
C
      EQUIVALENCE (DK31(1,3,1,1),VK311(1)),(DK31(1,2,2,1),VK312(1))
      EQUIVALENCE (DK31(1,1,3,1),VK313(1)),(DK31(1,3,3,1),VK314(1))
      EQUIVALENCE (DK31(1,2,1,2),VK315(1)),(DK31(1,1,2,2),VK316(1))
      EQUIVALENCE (DK31(1,3,2,2),VK317(1)),(DK31(1,2,3,2),VK318(1))
      EQUIVALENCE (DK31(1,1,1,3),VK319(1)),(DK31(1,3,1,3),VK31A(1))
      EQUIVALENCE (DK31(1,2,2,3),VK31B(1)),(DK31(1,1,3,3),VK31C(1))
      EQUIVALENCE (DK31(1,3,3,3),VK31D(1))
C
      EQUIVALENCE (DK32(1,3,1,1),VK321(1)),(DK32(1,2,2,1),VK322(1))
      EQUIVALENCE (DK32(1,1,3,1),VK323(1)),(DK32(1,3,3,1),VK324(1))
      EQUIVALENCE (DK32(1,2,1,2),VK325(1)),(DK32(1,1,2,2),VK326(1))
      EQUIVALENCE (DK32(1,3,2,2),VK327(1)),(DK32(1,2,3,2),VK328(1))
      EQUIVALENCE (DK32(1,1,1,3),VK329(1)),(DK32(1,3,1,3),VK32A(1))
      EQUIVALENCE (DK32(1,2,2,3),VK32B(1)),(DK32(1,1,3,3),VK32C(1))
      EQUIVALENCE (DK32(1,3,3,3),VK32D(1))
C
      DATA DK23/
     * 3.00000E 00, 2.99994E 00, 2.99976E 00, 2.99994E 00, 2.12009E 02,
     * 2.27392E 02, 2.99976E 00, 2.27392E 02, 1.64004E 03, 3.00000E 00,
     * 2.99994E 00, 2.99976E 00, 2.99994E 00, 2.12009E 02, 2.27392E 02,
     * 2.99976E 00, 2.27392E 02, 1.64004E 03/
C
      DATA DK24/
     * 1.20000E 00, 1.07141E-01, 2.66590E-02, 1.07141E-01, 8.30354E 00,
     * 2.06649E 00, 2.66590E-02, 2.06649E 00, 1.87447E 01, 1.20000E 00,
     * 1.07141E-01, 2.66590E-02, 1.07141E-01, 8.30354E 00, 2.06649E 00,
     * 2.66590E-02, 2.06649E 00, 1.87447E 01/
C
      DATA DK33/
     * 4.26666E 00,-2.99758E 01, 5.51758E-01, 3.53711E 00, 3.84922E 01,
     *-1.97191E 02, 1.16917E 01, 8.59063E 01,-9.43555E 01, 3.09043E 01,
     * 2.25836E 02,-1.04104E 03, 1.66109E 02,-5.37625E 02, 5.15313E 02,
     * 3.69250E 02, 2.31731E 03,-3.89100E 03,-2.70980E 02, 8.45438E 02,
     *-6.97000E 02,-5.11438E 02,-9.25000E 02,-5.18000E 03,-1.18669E 03,
     *-2.48690E 04,-2.59150E 04, 4.26666E 00,-2.99758E 01, 5.51758E-01,
     * 3.53711E 00, 3.84922E 01,-1.97191E 02, 1.16917E 01, 8.59063E 01,
     *-9.43555E 01, 3.09043E 01, 2.25836E 02,-1.04104E 03, 1.66109E 02,
     *-5.37625E 02, 5.15313E 02, 3.69250E 02, 2.31731E 03,-3.89100E 03,
     *-2.70980E 02, 8.45438E 02,-6.97000E 02,-5.11438E 02,-9.25000E 02,
     *-5.18000E 03,-1.18669E 03,-2.48690E 04,-2.59150E 04/
C
      DATA DK34/
     * 1.11429E 00,-5.95093E-02,-8.89160E-01,-2.48929E 00, 6.08435E 00,
     *-2.69824E 00, 2.63428E 00,-5.91846E 00, 1.57300E 01, 7.62204E 00,
     * 1.84435E 01,-1.65264E 01, 8.65918E 00, 2.94299E 01, 2.70020E 01,
     *-2.17324E 01, 8.93398E 01, 1.32223E 02, 1.74670E 01, 1.65359E 02,
     * 1.62687E 02, 9.09551E 01, 4.04840E 02, 5.58410E 02, 1.76172E 02,
     * 1.47751E 03, 3.38071E 03, 1.11429E 00,-5.95093E-02,-8.89160E-01,
     *-2.48929E 00, 6.08435E 00,-2.69824E 00, 2.63428E 00,-5.91846E 00,
     * 1.57300E 01, 7.62204E 00, 1.84435E 01,-1.65264E 01, 8.65918E 00,
     * 2.94299E 01, 2.70020E 01,-2.17324E 01, 8.93398E 01, 1.32223E 02,
     * 1.74670E 01, 1.65359E 02, 1.62687E 02, 9.09551E 01, 4.04840E 02,
     * 5.58410E 02, 1.76172E 02, 1.47751E 03, 3.38071E 03/
C
      DATA DK21/
     * 7.23901E-01, 5.86530E-01, 4.69711E-01, 3.71282E-01, 2.89201E-01,
     * 2.21551E-01, 1.66533E-01, 1.22460E-01, 8.77800E-02, 6.10542E-02,
     * 4.09508E-02, 2.62785E-02, 1.59674E-02, 9.02462E-03, 4.65012E-03,
     * 2.09618E-03, 7.77245E-04, 2.06947E-04, 3.71933E-05,-9.53674E-07,
     * 7.23901E-01, 5.86530E-01, 4.69711E-01, 3.71282E-01, 2.89201E-01,
     * 2.21551E-01, 1.66533E-01, 1.22460E-01, 8.77800E-02, 6.10542E-02,
     * 4.09508E-02, 2.62785E-02, 1.59674E-02, 9.02462E-03, 4.65012E-03,
     * 2.09618E-03, 7.77245E-04, 2.06947E-04, 3.71933E-05,-9.53674E-07,
     *-5.37313E 00,-2.95022E 00,-1.23895E 00,-9.12199E-02, 6.20592E-01,
     * 1.00521E 00, 1.15369E 00, 1.14107E 00, 1.02766E 00, 8.60512E-01,
     * 6.74935E-01, 4.95779E-01, 3.39156E-01, 2.13329E-01, 1.20838E-01,
     * 5.95732E-02, 2.37846E-02, 6.88171E-03, 8.24928E-04, 1.52588E-05,
     *-5.37313E 00,-2.95022E 00,-1.23895E 00,-9.12199E-02, 6.20592E-01,
     * 1.00521E 00, 1.15369E 00, 1.14107E 00, 1.02766E 00, 8.60512E-01,
     * 6.74935E-01, 4.95779E-01, 3.39156E-01, 2.13329E-01, 1.20838E-01,
     * 5.95732E-02, 2.37846E-02, 6.88171E-03, 8.24928E-04, 1.52588E-05,
     * 280*0.D0 /	
C
      DATA VK211/
     * 1.63407E 01, 3.79697E 00,-2.80702E 00,-5.47075E 00,-5.70927E 00,
     *-4.63152E 00,-3.01208E 00,-1.35625E 00, 4.11129E-02, 1.04199E 00,
     * 1.62351E 00, 1.83113E 00, 1.75508E 00, 1.49639E 00, 1.15486E 00,
     * 8.01830E-01, 4.96203E-01, 2.60412E-01, 9.79242E-02, 1.61133E-02,
     * 1.63407E 01, 3.79697E 00,-2.80702E 00,-5.47075E 00,-5.70927E 00,
     *-4.63152E 00,-3.01208E 00,-1.35625E 00, 4.11129E-02, 1.04199E 00,
     * 1.62351E 00, 1.83113E 00, 1.75508E 00, 1.49639E 00, 1.15486E 00,
     * 8.01830E-01, 4.96203E-01, 2.60412E-01, 9.79242E-02, 1.61133E-02,
     *-5.37313E 00,-2.95022E 00,-1.23895E 00,-9.12199E-02, 6.20607E-01,
     * 1.00522E 00, 1.15370E 00, 1.14108E 00, 1.02767E 00, 8.60525E-01,
     * 6.74950E-01, 4.95795E-01, 3.39173E-01, 2.13455E-01, 1.20878E-01,
     * 5.96161E-02, 2.41680E-02, 6.77109E-03, 1.11866E-03, 1.07765E-04,
     *-5.37313E 00,-2.95022E 00,-1.23895E 00,-9.12199E-02, 6.20607E-01,
     * 1.00522E 00, 1.15370E 00, 1.14108E 00, 1.02767E 00, 8.60525E-01,
     * 6.74950E-01, 4.95795E-01, 3.39173E-01, 2.13455E-01, 1.20878E-01,
     * 5.96161E-02, 2.41680E-02, 6.77109E-03, 1.11866E-03, 1.07765E-04/
C
      DATA VK212/
     * 4.02270E 01, 1.51189E 01, 3.49159E 00, 1.99036E-01, 1.46899E 00,
     * 4.66586E 00, 8.07114E 00, 1.06901E 01, 1.20712E 01, 1.21573E 01,
     * 1.11424E 01, 9.36526E 00, 7.21327E 00, 5.04456E 00, 3.14297E 00,
     * 1.68825E 00, 7.35001E-01, 2.24564E-01, 2.95868E-02,-2.77710E-03,
     * 4.02270E 01, 1.51189E 01, 3.49159E 00, 1.99036E-01, 1.46899E 00,
     * 4.66586E 00, 8.07114E 00, 1.06901E 01, 1.20712E 01, 1.21573E 01,
     * 1.11424E 01, 9.36526E 00, 7.21327E 00, 5.04456E 00, 3.14297E 00,
     * 1.68825E 00, 7.35001E-01, 2.24564E-01, 2.95868E-02,-2.77710E-03,
     *-1.23867E 02,-2.07622E 01, 6.41487E 00, 8.37708E-01,-1.24278E 01,
     *-2.09772E 01,-2.07048E 01,-1.24120E 01, 7.24838E-01, 1.49310E 01,
     * 2.69639E 01, 3.47235E 01, 3.74521E 01, 3.55096E 01, 3.01181E 01,
     * 2.28943E 01, 1.53234E 01, 8.68240E 00, 3.56505E 00, 6.54877E-01,
     *-1.23867E 02,-2.07622E 01, 6.41487E 00, 8.37708E-01,-1.24278E 01,
     *-2.09772E 01,-2.07048E 01,-1.24120E 01, 7.24838E-01, 1.49310E 01,
     * 2.69639E 01, 3.47235E 01, 3.74521E 01, 3.55096E 01, 3.01181E 01,
     * 2.28943E 01, 1.53234E 01, 8.68240E 00, 3.56505E 00, 6.54877E-01/
C
      DATA VK213/
     * 1.63407E 01, 3.79697E 00,-2.80702E 00,-5.47075E 00,-5.70921E 00,
     *-4.63150E 00,-3.01198E 00,-1.35593E 00, 4.12836E-02, 1.04231E 00,
     * 1.62374E 00, 1.83241E 00, 1.75576E 00, 1.49714E 00, 1.15587E 00,
     * 8.02746E-01, 4.97399E-01, 2.61926E-01, 1.02808E-01, 1.82858E-02,
     * 1.63407E 01, 3.79697E 00,-2.80702E 00,-5.47075E 00,-5.70921E 00,
     *-4.63150E 00,-3.01198E 00,-1.35593E 00, 4.12836E-02, 1.04231E 00,
     * 1.62374E 00, 1.83241E 00, 1.75576E 00, 1.49714E 00, 1.15587E 00,
     * 8.02746E-01, 4.97399E-01, 2.61926E-01, 1.02808E-01, 1.82858E-02,
     *-1.23867E 02,-2.07622E 01, 6.41487E 00, 8.37708E-01,-1.24278E 01,
     *-2.09772E 01,-2.07048E 01,-1.24120E 01, 7.24838E-01, 1.49310E 01,
     * 2.69639E 01, 3.47235E 01, 3.74521E 01, 3.55096E 01, 3.01181E 01,
     * 2.28943E 01, 1.53234E 01, 8.68240E 00, 3.56505E 00, 6.54877E-01,
     *-1.23867E 02,-2.07622E 01, 6.41487E 00, 8.37708E-01,-1.24278E 01,
     *-2.09772E 01,-2.07048E 01,-1.24120E 01, 7.24838E-01, 1.49310E 01,
     * 2.69639E 01, 3.47235E 01, 3.74521E 01, 3.55096E 01, 3.01181E 01,
     * 2.28943E 01, 1.53234E 01, 8.68240E 00, 3.56505E 00, 6.54877E-01/
C
      DATA VK214/
     * 3.88142E 02, 3.44951E 01, 2.11563E 01, 8.20708E 01, 1.12949E 02,
     * 9.68579E 01, 5.48499E 01, 1.59846E 01, 1.42847E 00, 1.99209E 01,
     * 6.66873E 01, 1.30468E 02, 1.96151E 02, 2.51774E 02, 2.90553E 02,
     * 3.12863E 02, 3.25245E 02, 3.36778E 02, 3.69251E 02, 4.39985E 02,
     * 3.88142E 02, 3.44951E 01, 2.11563E 01, 8.20708E 01, 1.12949E 02,
     * 9.68579E 01, 5.48499E 01, 1.59846E 01, 1.42847E 00, 1.99209E 01,
     * 6.66873E 01, 1.30468E 02, 1.96151E 02, 2.51774E 02, 2.90553E 02,
     * 3.12863E 02, 3.25245E 02, 3.36778E 02, 3.69251E 02, 4.39985E 02/
C
      DATA DK22/
     *-1.40187E-02,-3.82812E-02,-5.72187E-02,-7.12812E-02,-8.09187E-02,
     *-8.65813E-02,-8.87185E-02,-8.77813E-02,-8.42188E-02,-7.84814E-02,
     *-7.10191E-02,-6.22815E-02,-5.27194E-02,-4.27814E-02,-3.29196E-02,
     *-2.35819E-02,-1.52189E-02,-8.28218E-03,-3.21865E-03,-4.82440E-04,
     *-1.40187E-02,-3.82812E-02,-5.72187E-02,-7.12812E-02,-8.09187E-02,
     *-8.65813E-02,-8.87185E-02,-8.77813E-02,-8.42188E-02,-7.84814E-02,
     *-7.10191E-02,-6.22815E-02,-5.27194E-02,-4.27814E-02,-3.29196E-02,
     *-2.35819E-02,-1.52189E-02,-8.28218E-03,-3.21865E-03,-4.82440E-04,
     * 2.53539E-01, 6.86302E-01, 1.00767E 00, 1.22137E 00, 1.33509E 00,
     * 1.35972E 00, 1.30870E 00, 1.19721E 00, 1.04156E 00, 8.58376E-01,
     * 6.63943E-01, 4.73485E-01, 3.00412E-01, 1.55601E-01, 4.67796E-02,
     *-2.23675E-02,-5.27267E-02,-5.06296E-02,-2.85044E-02,-5.47695E-03,
     * 2.53539E-01, 6.86302E-01, 1.00767E 00, 1.22137E 00, 1.33509E 00,
     * 1.35972E 00, 1.30870E 00, 1.19721E 00, 1.04156E 00, 8.58376E-01,
     * 6.63943E-01, 4.73485E-01, 3.00412E-01, 1.55601E-01, 4.67796E-02,
     *-2.23675E-02,-5.27267E-02,-5.06296E-02,-2.85044E-02,-5.47695E-03,
     * 280*0.D0 /	
C
      DATA VK221/
     *-8.06389E-01,-2.14050E 00,-3.01742E 00,-3.42710E 00,-3.40609E 00,
     *-3.02791E 00,-2.39180E 00,-1.61055E 00,-7.98096E-01,-5.76935E-02,
     * 5.28427E-01, 9.07028E-01, 1.05991E 00, 1.00485E 00, 7.92740E-01,
     * 5.01095E-01, 2.17847E-01, 2.12440E-02,-4.56972E-02,-1.67561E-02,
     *-8.06389E-01,-2.14050E 00,-3.01742E 00,-3.42710E 00,-3.40609E 00,
     *-3.02791E 00,-2.39180E 00,-1.61055E 00,-7.98096E-01,-5.76935E-02,
     * 5.28427E-01, 9.07028E-01, 1.05991E 00, 1.00485E 00, 7.92740E-01,
     * 5.01095E-01, 2.17847E-01, 2.12440E-02,-4.56972E-02,-1.67561E-02,
     * 9.80787E-02, 1.86608E-01, 1.45040E-01, 1.17204E-02,-1.79318E-01,
     *-3.98351E-01,-6.19970E-01,-8.23063E-01,-9.90842E-01,-1.11082E 00,
     *-1.17485E 00,-1.17904E 00,-1.12386E 00,-1.01408E 00,-8.58727E-01,
     *-6.71225E-01,-4.69249E-01,-2.74795E-01,-1.14198E-01,-1.80731E-02,
     * 9.80787E-02, 1.86608E-01, 1.45040E-01, 1.17204E-02,-1.79318E-01,
     *-3.98351E-01,-6.19970E-01,-8.23063E-01,-9.90842E-01,-1.11082E 00,
     *-1.17485E 00,-1.17904E 00,-1.12386E 00,-1.01408E 00,-8.58727E-01,
     *-6.71225E-01,-4.69249E-01,-2.74795E-01,-1.14198E-01,-1.80731E-02/
C
      DATA VK222/
     *-1.77400E 00,-3.34729E 00,-2.55879E 00,-2.08738E-01, 2.94703E 00,
     * 6.24084E 00, 9.12684E 00, 1.12045E 01, 1.22313E 01, 1.21258E 01,
     * 1.09601E 01, 8.94055E 00, 6.38358E 00, 3.67049E 00, 1.20503E 00,
     *-6.48621E-01,-1.63411E 00,-1.68602E 00,-1.01277E 00,-2.03949E-01,
     *-1.77400E 00,-3.34729E 00,-2.55879E 00,-2.08738E-01, 2.94703E 00,
     * 6.24084E 00, 9.12684E 00, 1.12045E 01, 1.22313E 01, 1.21258E 01,
     * 1.09601E 01, 8.94055E 00, 6.38358E 00, 3.67049E 00, 1.20503E 00,
     *-6.48621E-01,-1.63411E 00,-1.68602E 00,-1.01277E 00,-2.03949E-01,
     * 5.64355E 00, 1.04524E 01, 7.69362E 00, 6.39679E-01,-7.44145E 00,
     *-1.37993E 01,-1.65658E 01,-1.49467E 01,-9.24042E 00,-6.82877E-01,
     * 8.85028E 00, 1.72508E 01, 2.26414E 01, 2.38329E 01, 2.06730E 01,
     * 1.42384E 01, 6.68240E 00, 6.85562E-01,-1.63100E 00,-6.14624E-01,
     * 5.64355E 00, 1.04524E 01, 7.69362E 00, 6.39679E-01,-7.44145E 00,
     *-1.37993E 01,-1.65658E 01,-1.49467E 01,-9.24042E 00,-6.82877E-01,
     * 8.85028E 00, 1.72508E 01, 2.26414E 01, 2.38329E 01, 2.06730E 01,
     * 1.42384E 01, 6.68240E 00, 6.85562E-01,-1.63100E 00,-6.14624E-01/
C
      DATA VK223/
     *-2.71833E-01,-2.12463E-01, 3.67910E-01, 1.06687E 00, 1.60468E 00,
     * 1.80801E 00, 1.59363E 00, 9.52188E-01,-6.80828E-02,-1.37768E 00,
     *-2.86197E 00,-4.39770E 00,-5.86899E 00,-7.18370E 00,-8.29009E 00,
     *-9.19226E 00,-9.96710E 00,-1.07805E 01,-1.19038E 01,-1.37284E 01,
     *-2.71833E-01,-2.12463E-01, 3.67910E-01, 1.06687E 00, 1.60468E 00,
     * 1.80801E 00, 1.59363E 00, 9.52188E-01,-6.80828E-02,-1.37768E 00,
     *-2.86197E 00,-4.39770E 00,-5.86899E 00,-7.18370E 00,-8.29009E 00,
     *-9.19226E 00,-9.96710E 00,-1.07805E 01,-1.19038E 01,-1.37284E 01,
     * 4.91760E 00, 3.81956E 00,-6.45939E 00,-1.82580E 01,-2.64615E 01,
     *-2.83996E 01,-2.35459E 01,-1.30685E 01, 7.07108E-01, 1.48736E 01,
     * 2.64963E 01, 3.30990E 01, 3.30260E 01, 2.56037E 01, 1.11167E 01,
     *-9.60555E 00,-3.58288E 01,-6.79783E 01,-1.09306E 02,-1.67855E 02,
     * 4.91760E 00, 3.81956E 00,-6.45939E 00,-1.82580E 01,-2.64615E 01,
     *-2.83996E 01,-2.35459E 01,-1.30685E 01, 7.07108E-01, 1.48736E 01,
     * 2.64963E 01, 3.30990E 01, 3.30260E 01, 2.56037E 01, 1.11167E 01,
     *-9.60555E 00,-3.58288E 01,-6.79783E 01,-1.09306E 02,-1.67855E 02/
C
      DATA VK224/
     *-1.56498E 01,-1.19871E 01, 1.92045E 01, 5.10776E 01, 6.74117E 01,
     * 6.32789E 01, 4.32739E 01, 1.80717E 01, 2.37915E-01, 7.82471E-02,
     * 2.24907E 01, 6.52144E 01, 1.18946E 02, 1.69202E 02, 1.99337E 02,
     * 1.93528E 02, 1.37852E 02, 1.69453E 01,-1.97296E 02,-5.70445E 02,
     *-1.56498E 01,-1.19871E 01, 1.92045E 01, 5.10776E 01, 6.74117E 01,
     * 6.32789E 01, 4.32739E 01, 1.80717E 01, 2.37915E-01, 7.82471E-02,
     * 2.24907E 01, 6.52144E 01, 1.18946E 02, 1.69202E 02, 1.99337E 02,
     * 1.93528E 02, 1.37852E 02, 1.69453E 01,-1.97296E 02,-5.70445E 02/
C
      DATA DK31/
     * 2.62084E-02, 6.50600E-02, 8.69340E-02, 9.59013E-02, 9.54958E-02,
     * 8.87145E-02, 7.80339E-02, 6.54303E-02, 5.24248E-02, 4.01051E-02,
     * 2.92027E-02, 2.01113E-02, 1.29794E-02, 7.73174E-03, 4.16183E-03,
     * 1.94722E-03, 7.34806E-04, 2.14636E-04, 1.49608E-05,-4.82798E-06,
     * 2.62084E-02, 6.50600E-02, 8.69340E-02, 9.59013E-02, 9.54958E-02,
     * 8.87145E-02, 7.80339E-02, 6.54303E-02, 5.24248E-02, 4.01051E-02,
     * 2.92027E-02, 2.01113E-02, 1.29794E-02, 7.73174E-03, 4.16183E-03,
     * 1.94722E-03, 7.34806E-04, 2.14636E-04, 1.49608E-05,-4.82798E-06,
     *-5.71618E-02,-1.40209E-01,-1.82808E-01,-1.94182E-01,-1.83510E-01,
     *-1.59179E-01,-1.28281E-01,-9.63154E-02,-6.71291E-02,-4.29735E-02,
     *-2.47583E-02,-1.23243E-02,-4.80175E-03,-9.66072E-04, 4.89235E-04,
     * 6.94275E-04, 4.34875E-04, 1.67847E-04, 5.81741E-05, 3.33786E-05,
     *-5.71618E-02,-1.40209E-01,-1.82808E-01,-1.94182E-01,-1.83510E-01,
     *-1.59179E-01,-1.28281E-01,-9.63154E-02,-6.71291E-02,-4.29735E-02,
     *-2.47583E-02,-1.23243E-02,-4.80175E-03,-9.66072E-04, 4.89235E-04,
     * 6.94275E-04, 4.34875E-04, 1.67847E-04, 5.81741E-05, 3.33786E-05,
     * 1000*0.D0 /
C
      DATA VK311/
     * 7.12703E-02, 1.71127E-01, 2.13364E-01, 2.10919E-01, 1.79227E-01,
     * 1.33225E-01, 8.52278E-02, 4.37698E-02, 1.33629E-02,-5.04780E-03,
     *-1.31092E-02,-1.39017E-02,-1.07908E-02,-6.59180E-03,-3.10230E-03,
     *-1.03283E-03,-1.00136E-04, 8.86917E-05,-1.96457E-04, 3.62396E-05,
     * 7.12703E-02, 1.71127E-01, 2.13364E-01, 2.10919E-01, 1.79227E-01,
     * 1.33225E-01, 8.52278E-02, 4.37698E-02, 1.33629E-02,-5.04780E-03,
     *-1.31092E-02,-1.39017E-02,-1.07908E-02,-6.59180E-03,-3.10230E-03,
     *-1.03283E-03,-1.00136E-04, 8.86917E-05,-1.96457E-04, 3.62396E-05,
     *-1.83731E-01,-3.18543E-01,-2.22404E-01,-1.81940E-02, 2.09026E-01,
     * 4.05564E-01, 5.42821E-01, 6.11234E-01, 6.14804E-01, 5.66018E-01,
     * 4.81788E-01, 3.79718E-01, 2.76002E-01, 1.82834E-01, 1.08319E-01,
     * 5.51462E-02, 2.29197E-02, 6.93989E-03, 1.05476E-03,-2.67029E-05,
     *-1.83731E-01,-3.18543E-01,-2.22404E-01,-1.81940E-02, 2.09026E-01,
     * 4.05564E-01, 5.42821E-01, 6.11234E-01, 6.14804E-01, 5.66018E-01,
     * 4.81788E-01, 3.79718E-01, 2.76002E-01, 1.82834E-01, 1.08319E-01,
     * 5.51462E-02, 2.29197E-02, 6.93989E-03, 1.05476E-03,-2.67029E-05/
C
      DATA VK312/
     * 4.00783E-01, 6.86990E-01, 4.68815E-01, 3.85818E-02,-3.99460E-01,
     *-7.25228E-01,-8.89840E-01,-8.97408E-01,-7.85171E-01,-6.04795E-01,
     *-4.07226E-01,-2.31861E-01,-1.01621E-01,-2.27261E-02, 1.25523E-02,
     * 1.90563E-02, 1.26429E-02, 4.66728E-03, 3.72887E-04,-9.01222E-04,
     * 4.00783E-01, 6.86990E-01, 4.68815E-01, 3.85818E-02,-3.99460E-01,
     *-7.25228E-01,-8.89840E-01,-8.97408E-01,-7.85171E-01,-6.04795E-01,
     *-4.07226E-01,-2.31861E-01,-1.01621E-01,-2.27261E-02, 1.25523E-02,
     * 1.90563E-02, 1.26429E-02, 4.66728E-03, 3.72887E-04,-9.01222E-04,
     *-4.99827E-01,-8.39592E-01,-5.49638E-01,-4.56104E-02, 3.85552E-01,
     * 6.02007E-01, 5.86308E-01, 4.03378E-01, 1.52506E-01,-7.40514E-02,
     *-2.18075E-01,-2.63045E-01,-2.29514E-01,-1.55805E-01,-7.96648E-02,
     *-2.83645E-02,-2.59066E-03, 4.10390E-03, 3.40641E-03, 3.54671E-03,
     *-4.99827E-01,-8.39592E-01,-5.49638E-01,-4.56104E-02, 3.85552E-01,
     * 6.02007E-01, 5.86308E-01, 4.03378E-01, 1.52506E-01,-7.40514E-02,
     *-2.18075E-01,-2.63045E-01,-2.29514E-01,-1.55805E-01,-7.96648E-02,
     *-2.83645E-02,-2.59066E-03, 4.10390E-03, 3.40641E-03, 3.54671E-03/
C
      DATA VK313/
     * 5.10907E-01, 3.69351E-01,-5.50015E-01,-1.42845E 00,-1.89046E 00,
     *-1.85347E 00,-1.40678E 00,-7.18369E-01, 3.09362E-02, 6.90882E-01,
     * 1.16251E 00, 1.40563E 00, 1.43147E 00, 1.28585E 00, 1.03486E 00,
     * 7.46716E-01, 4.76855E-01, 2.57113E-01, 1.04706E-01, 1.60313E-02,
     * 5.10907E-01, 3.69351E-01,-5.50015E-01,-1.42845E 00,-1.89046E 00,
     *-1.85347E 00,-1.40678E 00,-7.18369E-01, 3.09362E-02, 6.90882E-01,
     * 1.16251E 00, 1.40563E 00, 1.43147E 00, 1.28585E 00, 1.03486E 00,
     * 7.46716E-01, 4.76855E-01, 2.57113E-01, 1.04706E-01, 1.60313E-02,
     *-1.11472E 00,-7.98965E-01, 1.15161E 00, 2.88744E 00, 3.63011E 00,
     * 3.32670E 00, 2.31806E 00, 1.06729E 00,-2.68393E-02,-7.25184E-01,
     *-9.70853E-01,-8.45973E-01,-5.15488E-01,-1.49636E-01, 1.30365E-01,
     * 2.67171E-01, 2.74881E-01, 1.96085E-01, 8.96225E-02, 2.16951E-02,
     *-1.11472E 00,-7.98965E-01, 1.15161E 00, 2.88744E 00, 3.63011E 00,
     * 3.32670E 00, 2.31806E 00, 1.06729E 00,-2.68393E-02,-7.25184E-01,
     *-9.70853E-01,-8.45973E-01,-5.15488E-01,-1.49636E-01, 1.30365E-01,
     * 2.67171E-01, 2.74881E-01, 1.96085E-01, 8.96225E-02, 2.16951E-02/
C
      DATA VK314/
     * 1.39076E 00, 9.81723E-01,-1.33330E 00,-3.12576E 00,-3.53954E 00,
     *-2.78612E 00,-1.55023E 00,-5.02043E-01,-1.66225E-02,-1.10517E-01,
     *-5.40855E-01,-9.80112E-01,-1.19477E 00,-1.09088E 00,-7.57612E-01,
     *-3.69242E-01,-7.24487E-02, 6.22559E-02, 1.27630E-01, 1.62106E-01,
     * 1.39076E 00, 9.81723E-01,-1.33330E 00,-3.12576E 00,-3.53954E 00,
     *-2.78612E 00,-1.55023E 00,-5.02043E-01,-1.66225E-02,-1.10517E-01,
     *-5.40855E-01,-9.80112E-01,-1.19477E 00,-1.09088E 00,-7.57612E-01,
     *-3.69242E-01,-7.24487E-02, 6.22559E-02, 1.27630E-01, 1.62106E-01,
     *-1.83731E-01,-3.18543E-01,-2.22404E-01,-1.81940E-02, 2.09022E-01,
     * 4.05561E-01, 5.42817E-01, 6.11246E-01, 6.14783E-01, 5.66009E-01,
     * 4.81776E-01, 3.79704E-01, 2.75922E-01, 1.82797E-01, 1.08182E-01,
     * 5.52111E-02, 2.28662E-02, 6.70624E-03, 9.52721E-04,-3.70026E-04,
     *-1.83731E-01,-3.18543E-01,-2.22404E-01,-1.81940E-02, 2.09022E-01,
     * 4.05561E-01, 5.42817E-01, 6.11246E-01, 6.14783E-01, 5.66009E-01,
     * 4.81776E-01, 3.79704E-01, 2.75922E-01, 1.82797E-01, 1.08182E-01,
     * 5.52111E-02, 2.28662E-02, 6.70624E-03, 9.52721E-04,-3.70026E-04/
C
      DATA VK315/
     * 4.00783E-01, 6.86990E-01, 4.68815E-01, 3.85838E-02,-3.99458E-01,
     *-7.25224E-01,-8.89826E-01,-8.97398E-01,-7.85137E-01,-6.04769E-01,
     *-4.07193E-01,-2.31826E-01,-1.01509E-01,-2.25782E-02, 1.27516E-02,
     * 1.91803E-02, 1.28050E-02, 4.83894E-03, 7.56264E-04,-1.63078E-04,
     * 4.00783E-01, 6.86990E-01, 4.68815E-01, 3.85838E-02,-3.99458E-01,
     *-7.25224E-01,-8.89826E-01,-8.97398E-01,-7.85137E-01,-6.04769E-01,
     *-4.07193E-01,-2.31826E-01,-1.01509E-01,-2.25782E-02, 1.27516E-02,
     * 1.91803E-02, 1.28050E-02, 4.83894E-03, 7.56264E-04,-1.63078E-04,
     *-4.99827E-01,-8.39592E-01,-5.49638E-01,-4.56123E-02, 3.85554E-01,
     * 6.02007E-01, 5.86278E-01, 4.03369E-01, 1.52446E-01,-7.40135E-02,
     *-2.18161E-01,-2.63161E-01,-2.29663E-01,-1.55273E-01,-8.03336E-02,
     *-2.64090E-02,-2.05702E-03, 7.10797E-03, 8.15731E-03, 1.02094E-02,
     *-4.99827E-01,-8.39592E-01,-5.49638E-01,-4.56123E-02, 3.85554E-01,
     * 6.02007E-01, 5.86278E-01, 4.03369E-01, 1.52446E-01,-7.40135E-02,
     *-2.18161E-01,-2.63161E-01,-2.29663E-01,-1.55273E-01,-8.03336E-02,
     *-2.64090E-02,-2.05702E-03, 7.10797E-03, 8.15731E-03, 1.02094E-02/
C
      DATA VK316/
     * 1.29660E 00, 1.58992E 00, 6.10227E-01, 4.91133E-02, 5.03014E-01,
     * 1.89633E 00, 3.81330E 00, 5.74143E 00, 7.23534E 00, 8.00728E 00,
     * 7.96223E 00, 7.18018E 00, 5.87407E 00, 4.32719E 00, 2.82056E 00,
     * 1.57404E 00, 7.13013E-01, 2.28607E-01, 4.94537E-02, 1.23596E-02,
     * 1.29660E 00, 1.58992E 00, 6.10227E-01, 4.91133E-02, 5.03014E-01,
     * 1.89633E 00, 3.81330E 00, 5.74143E 00, 7.23534E 00, 8.00728E 00,
     * 7.96223E 00, 7.18018E 00, 5.87407E 00, 4.32719E 00, 2.82056E 00,
     * 1.57404E 00, 7.13013E-01, 2.28607E-01, 4.94537E-02, 1.23596E-02,
     *-2.82874E 00,-3.43138E 00,-1.28900E 00,-1.00068E-01,-9.56833E-01,
     *-3.37984E 00,-6.23322E 00,-8.40656E 00,-9.21466E 00,-8.53102E 00,
     *-6.70699E 00,-4.36404E 00,-2.15143E 00,-5.26367E-01, 3.34106E-01,
     * 5.51147E-01, 3.86993E-01, 1.37527E-01, 4.68750E-02,-6.05011E-02,
     *-2.82874E 00,-3.43138E 00,-1.28900E 00,-1.00068E-01,-9.56833E-01,
     *-3.37984E 00,-6.23322E 00,-8.40656E 00,-9.21466E 00,-8.53102E 00,
     *-6.70699E 00,-4.36404E 00,-2.15143E 00,-5.26367E-01, 3.34106E-01,
     * 5.51147E-01, 3.86993E-01, 1.37527E-01, 4.68750E-02,-6.05011E-02/
C
      DATA VK317/
     * 3.52869E 00, 4.19900E 00, 1.51706E 00, 1.10102E-01, 9.14530E-01,
     * 2.78326E 00, 4.07313E 00, 3.73720E 00, 1.74516E 00,-1.08864E 00,
     *-3.63052E 00,-4.99280E 00,-4.89838E 00,-3.68564E 00,-2.11089E 00,
     *-8.32028E-01,-1.20366E-01, 6.10695E-02,-8.06618E-02,-7.66726E-02,
     * 3.52869E 00, 4.19900E 00, 1.51706E 00, 1.10102E-01, 9.14530E-01,
     * 2.78326E 00, 4.07313E 00, 3.73720E 00, 1.74516E 00,-1.08864E 00,
     *-3.63052E 00,-4.99280E 00,-4.89838E 00,-3.68564E 00,-2.11089E 00,
     *-8.32028E-01,-1.20366E-01, 6.10695E-02,-8.06618E-02,-7.66726E-02,
     *-3.64439E 00,-1.98763E 00, 1.22565E 00, 1.40676E-01,-4.19576E 00,
     *-8.45843E 00,-9.71019E 00,-6.59273E 00, 5.05219E-01, 9.89810E 00,
     * 1.93212E 01, 2.66700E 01, 3.05278E 01, 3.04654E 01, 2.69811E 01,
     * 2.12519E 01, 1.46414E 01, 8.44965E 00, 3.52293E 00, 6.50543E-01,
     *-3.64439E 00,-1.98763E 00, 1.22565E 00, 1.40676E-01,-4.19576E 00,
     *-8.45843E 00,-9.71019E 00,-6.59273E 00, 5.05219E-01, 9.89810E 00,
     * 1.93212E 01, 2.66700E 01, 3.05278E 01, 3.04654E 01, 2.69811E 01,
     * 2.12519E 01, 1.46414E 01, 8.44965E 00, 3.52293E 00, 6.50543E-01/
C
      DATA VK318/
     * 7.95264E 00, 4.30122E 00,-2.57175E 00,-3.10248E-01, 8.01312E 00,
     * 1.51296E 01, 1.59485E 01, 9.76251E 00,-5.06012E-01,-1.03671E 01,
     *-1.60934E 01,-1.60181E 01,-1.09367E 01,-3.43331E 00, 3.26215E 00,
     * 7.80943E 00, 8.34391E 00, 6.24422E 00, 3.15665E 00, 9.10339E-01,
     * 7.95264E 00, 4.30122E 00,-2.57175E 00,-3.10248E-01, 8.01312E 00,
     * 1.51296E 01, 1.59485E 01, 9.76251E 00,-5.06012E-01,-1.03671E 01,
     *-1.60934E 01,-1.60181E 01,-1.09367E 01,-3.43331E 00, 3.26215E 00,
     * 7.80943E 00, 8.34391E 00, 6.24422E 00, 3.15665E 00, 9.10339E-01,
     *-9.92444E 00,-5.28875E 00, 2.98920E 00, 3.89630E-01,-7.72250E 00,
     *-1.25675E 01,-1.05769E 01,-4.55057E 00,-1.50528E-01,-1.59857E 00,
     *-8.99747E 00,-1.86449E 01,-2.53688E 01,-2.57571E 01,-1.97659E 01,
     *-1.04971E 01,-2.34274E 00, 3.02325E 00, 2.88699E 00, 2.23842E 00,
     *-9.92444E 00,-5.28875E 00, 2.98920E 00, 3.89630E-01,-7.72250E 00,
     *-1.25675E 01,-1.05769E 01,-4.55057E 00,-1.50528E-01,-1.59857E 00,
     *-8.99747E 00,-1.86449E 01,-2.53688E 01,-2.57571E 01,-1.97659E 01,
     *-1.04971E 01,-2.34274E 00, 3.02325E 00, 2.88699E 00, 2.23842E 00/
C
      DATA VK319/
     * 5.10907E-01, 3.69351E-01,-5.50015E-01,-1.42845E 00,-1.89046E 00,
     *-1.85350E 00,-1.40675E 00,-7.18449E-01, 3.08685E-02, 6.90541E-01,
     * 1.16263E 00, 1.40494E 00, 1.43046E 00, 1.28516E 00, 1.03391E 00,
     * 7.45580E-01, 4.73408E-01, 2.52549E-01, 9.86118E-02, 1.54486E-02,
     * 5.10907E-01, 3.69351E-01,-5.50015E-01,-1.42845E 00,-1.89046E 00,
     *-1.85350E 00,-1.40675E 00,-7.18449E-01, 3.08685E-02, 6.90541E-01,
     * 1.16263E 00, 1.40494E 00, 1.43046E 00, 1.28516E 00, 1.03391E 00,
     * 7.45580E-01, 4.73408E-01, 2.52549E-01, 9.86118E-02, 1.54486E-02,
     *-1.11472E 00,-7.98966E-01, 1.15161E 00, 2.88747E 00, 3.63008E 00,
     * 3.32681E 00, 2.31810E 00, 1.06714E 00,-2.68393E-02,-7.25673E-01,
     *-9.70365E-01,-8.47649E-01,-5.15875E-01,-1.50324E-01, 1.28172E-01,
     * 2.64146E-01, 2.68563E-01, 1.90398E-01, 8.29353E-02, 5.38731E-03,
     *-1.11472E 00,-7.98966E-01, 1.15161E 00, 2.88747E 00, 3.63008E 00,
     * 3.32681E 00, 2.31810E 00, 1.06714E 00,-2.68393E-02,-7.25673E-01,
     *-9.70365E-01,-8.47649E-01,-5.15875E-01,-1.50324E-01, 1.28172E-01,
     * 2.64146E-01, 2.68563E-01, 1.90398E-01, 8.29353E-02, 5.38731E-03/
C
      DATA VK31A/
     * 1.39076E 00, 9.81717E-01,-1.33331E 00,-3.12578E 00,-3.53957E 00,
     *-2.78617E 00,-1.55030E 00,-5.02374E-01,-1.68562E-02,-1.09776E-01,
     *-5.40855E-01,-9.82666E-01,-1.19324E 00,-1.08985E 00,-7.69148E-01,
     *-3.73649E-01,-5.65062E-02, 9.92384E-02, 5.38425E-02, 8.17232E-02,
     * 1.39076E 00, 9.81717E-01,-1.33331E 00,-3.12578E 00,-3.53957E 00,
     *-2.78617E 00,-1.55030E 00,-5.02374E-01,-1.68562E-02,-1.09776E-01,
     *-5.40855E-01,-9.82666E-01,-1.19324E 00,-1.08985E 00,-7.69148E-01,
     *-3.73649E-01,-5.65062E-02, 9.92384E-02, 5.38425E-02, 8.17232E-02,
     *-3.64439E 00,-1.98763E 00, 1.22565E 00, 1.40676E-01,-4.19576E 00,
     *-8.45843E 00,-9.71019E 00,-6.59273E 00, 5.05219E-01, 9.89810E 00,
     * 1.93212E 01, 2.66700E 01, 3.05278E 01, 3.04654E 01, 2.69614E 01,
     * 2.12456E 01, 1.46362E 01, 8.48087E 00, 3.52293E 00, 6.50543E-01,
     *-3.64439E 00,-1.98763E 00, 1.22565E 00, 1.40676E-01,-4.19576E 00,
     *-8.45843E 00,-9.71019E 00,-6.59273E 00, 5.05219E-01, 9.89810E 00,
     * 1.93212E 01, 2.66700E 01, 3.05278E 01, 3.04654E 01, 2.69614E 01,
     * 2.12456E 01, 1.46362E 01, 8.48087E 00, 3.52293E 00, 6.50543E-01/
C
      DATA VK31B/
     * 7.95264E 00, 4.30118E 00,-2.57180E 00,-3.10626E-01, 8.01261E 00,
     * 1.51288E 01, 1.59474E 01, 9.76100E 00,-5.07172E-01,-1.03772E 01,
     *-1.61191E 01,-1.60176E 01,-1.10164E 01,-3.52721E 00, 3.39742E 00,
     * 7.53603E 00, 8.16019E 00, 6.64438E 00, 2.38315E 00, 5.69901E-01,
     * 7.95264E 00, 4.30118E 00,-2.57180E 00,-3.10626E-01, 8.01261E 00,
     * 1.51288E 01, 1.59474E 01, 9.76100E 00,-5.07172E-01,-1.03772E 01,
     *-1.61191E 01,-1.60176E 01,-1.10164E 01,-3.52721E 00, 3.39742E 00,
     * 7.53603E 00, 8.16019E 00, 6.64438E 00, 2.38315E 00, 5.69901E-01,
     *-9.92444E 00,-5.28867E 00, 2.98913E 00, 3.89630E-01,-7.72250E 00,
     *-1.25675E 01,-1.05851E 01,-4.54617E 00,-1.52313E-01,-1.61647E 00,
     *-9.04730E 00,-1.86392E 01,-2.54895E 01,-2.59766E 01,-1.99383E 01,
     *-1.10045E 01,-2.10193E 00, 2.18349E 00, 3.98471E 00, 1.85852E-02,
     *-9.92444E 00,-5.28867E 00, 2.98913E 00, 3.89630E-01,-7.72250E 00,
     *-1.25675E 01,-1.05851E 01,-4.54617E 00,-1.52313E-01,-1.61647E 00,
     *-9.04730E 00,-1.86392E 01,-2.54895E 01,-2.59766E 01,-1.99383E 01,
     *-1.10045E 01,-2.10193E 00, 2.18349E 00, 3.98471E 00, 1.85852E-02/
C
      DATA VK31C/
     * 1.04191E 01, 3.15857E 00, 4.27946E 00, 2.16500E 01, 3.75030E 01,
     * 3.87381E 01, 2.55395E 01, 8.36140E 00, 9.24332E-01, 1.32143E 01,
     * 4.80079E 01, 1.00349E 02, 1.60205E 02, 2.16517E 02, 2.61034E 02,
     * 2.91655E 02, 3.11244E 02, 3.32191E 02, 3.66824E 02, 4.43740E 02,
     * 1.04191E 01, 3.15857E 00, 4.27946E 00, 2.16500E 01, 3.75030E 01,
     * 3.87381E 01, 2.55395E 01, 8.36140E 00, 9.24332E-01, 1.32143E 01,
     * 4.80079E 01, 1.00349E 02, 1.60205E 02, 2.16517E 02, 2.61034E 02,
     * 2.91655E 02, 3.11244E 02, 3.32191E 02, 3.66824E 02, 4.43740E 02,
     *-2.27412E 01,-6.84285E 00,-8.93764E 00,-4.36921E 01,-7.19566E 01,
     *-6.95421E 01,-4.21459E 01,-1.24954E 01,-1.21826E 00,-1.35874E 01,
     *-3.93347E 01,-5.98066E 01,-5.71953E 01,-2.30696E 01, 3.24368E 01,
     * 1.06135E 02, 1.77311E 02, 2.57348E 02, 3.24694E 02, 4.23870E 02,
     *-2.27412E 01,-6.84285E 00,-8.93764E 00,-4.36921E 01,-7.19566E 01,
     *-6.95421E 01,-4.21459E 01,-1.24954E 01,-1.21826E 00,-1.35874E 01,
     *-3.93347E 01,-5.98066E 01,-5.71953E 01,-2.30696E 01, 3.24368E 01,
     * 1.06135E 02, 1.77311E 02, 2.57348E 02, 3.24694E 02, 4.23870E 02/
C
      DATA VK31D/
     * 2.83908E 01, 8.42999E 00, 1.02980E 01, 4.71459E 01, 7.00466E 01,
     * 5.82773E 01, 2.83699E 01, 6.07909E 00, 2.80762E-01,-2.46237E 00,
     *-2.24408E 01,-7.02075E 01,-1.33521E 02,-1.80696E 02,-1.85644E 02,
     *-1.38191E 02,-3.00911E 01, 1.09451E 02, 2.92781E 02, 5.09256E 02,
     * 2.83908E 01, 8.42999E 00, 1.02980E 01, 4.71459E 01, 7.00466E 01,
     * 5.82773E 01, 2.83699E 01, 6.07909E 00, 2.80762E-01,-2.46237E 00,
     *-2.24408E 01,-7.02075E 01,-1.33521E 02,-1.80696E 02,-1.85644E 02,
     *-1.38191E 02,-3.00911E 01, 1.09451E 02, 2.92781E 02, 5.09256E 02/
C
      DATA DK32/
     *-6.94530E-04,-4.43137E-03,-1.07714E-02,-1.85877E-02,-2.68884E-02,
     *-3.48290E-02,-4.17216E-02,-4.70396E-02,-5.04215E-02,-5.16685E-02,
     *-5.07405E-02,-4.77479E-02,-4.29408E-02,-3.66951E-02,-2.94909E-02,
     *-2.18977E-02,-1.45412E-02,-8.08448E-03,-3.18819E-03,-4.81009E-04,
     *-6.94530E-04,-4.43137E-03,-1.07714E-02,-1.85877E-02,-2.68884E-02,
     *-3.48290E-02,-4.17216E-02,-4.70396E-02,-5.04215E-02,-5.16685E-02,
     *-5.07405E-02,-4.77479E-02,-4.29408E-02,-3.66951E-02,-2.94909E-02,
     *-2.18977E-02,-1.45412E-02,-8.08448E-03,-3.18819E-03,-4.81009E-04,
     * 1.51380E-03, 9.53905E-03, 2.26205E-02, 3.75791E-02, 5.15791E-02,
     * 6.23638E-02, 6.84167E-02, 6.90342E-02, 6.43175E-02, 5.50873E-02,
     * 4.27253E-02, 2.89564E-02, 1.56032E-02, 4.31669E-03,-3.68285E-03,
     *-7.81864E-03,-8.29375E-03,-6.09070E-03,-2.85023E-03,-4.81129E-04,
     * 1.51380E-03, 9.53905E-03, 2.26205E-02, 3.75791E-02, 5.15791E-02,
     * 6.23638E-02, 6.84167E-02, 6.90342E-02, 6.43175E-02, 5.50873E-02,
     * 4.27253E-02, 2.89564E-02, 1.56032E-02, 4.31669E-03,-3.68285E-03,
     *-7.81864E-03,-8.29375E-03,-6.09070E-03,-2.85023E-03,-4.81129E-04,
     * 1000*0.D0 /
C
      DATA VK321/
     *-1.88523E-03,-1.16187E-02,-2.63366E-02,-4.06964E-02,-5.01863E-02,
     *-5.19348E-02,-4.51252E-02,-3.09805E-02,-1.23589E-02, 6.96081E-03,
     * 2.31593E-02, 3.32550E-02, 3.58114E-02, 3.13000E-02, 2.19584E-02,
     * 1.12093E-02, 2.52509E-03,-1.84351E-03,-1.99383E-03,-4.41432E-04,
     *-1.88523E-03,-1.16187E-02,-2.63366E-02,-4.06964E-02,-5.01863E-02,
     *-5.19348E-02,-4.51252E-02,-3.09805E-02,-1.23589E-02, 6.96081E-03,
     * 2.31593E-02, 3.32550E-02, 3.58114E-02, 3.13000E-02, 2.19584E-02,
     * 1.12093E-02, 2.52509E-03,-1.84351E-03,-1.99383E-03,-4.41432E-04,
     * 1.25555E-02, 7.93895E-02, 1.89553E-01, 3.18251E-01, 4.43290E-01,
     * 5.46539E-01, 6.14923E-01, 6.40990E-01, 6.22996E-01, 5.64543E-01,
     * 4.73831E-01, 3.62520E-01, 2.44287E-01, 1.33155E-01, 4.16803E-02,
     *-2.09188E-02,-5.04627E-02,-4.94547E-02,-2.82087E-02,-5.47123E-03,
     * 1.25555E-02, 7.93895E-02, 1.89553E-01, 3.18251E-01, 4.43290E-01,
     * 5.46539E-01, 6.14923E-01, 6.40990E-01, 6.22996E-01, 5.64543E-01,
     * 4.73831E-01, 3.62520E-01, 2.44287E-01, 1.33155E-01, 4.16803E-02,
     *-2.09188E-02,-5.04627E-02,-4.94547E-02,-2.82087E-02,-5.47123E-03/
C
      DATA VK322/
     *-2.73660E-02,-1.70898E-01,-3.98095E-01,-6.43493E-01,-8.50533E-01,
     *-9.78971E-01,-1.00896E 00,-9.41557E-01,-7.95846E-01,-6.03322E-01,
     *-4.00606E-01,-2.21618E-01,-9.05266E-02,-1.72930E-02, 3.81184E-03,
     *-8.46195E-03,-2.93751E-02,-3.75881E-02,-2.52457E-02,-5.25379E-03,
     *-2.73660E-02,-1.70898E-01,-3.98095E-01,-6.43493E-01,-8.50533E-01,
     *-9.78971E-01,-1.00896E 00,-9.41557E-01,-7.95846E-01,-6.03322E-01,
     *-4.00606E-01,-2.21618E-01,-9.05266E-02,-1.72930E-02, 3.81184E-03,
     *-8.46195E-03,-2.93751E-02,-3.75881E-02,-2.52457E-02,-5.25379E-03,
     * 3.40805E-02, 2.08164E-01, 4.63544E-01, 6.97040E-01, 8.27953E-01,
     * 8.15969E-01, 6.66600E-01, 4.24147E-01, 1.54993E-01,-7.37219E-02,
     *-2.14244E-01,-2.51061E-01,-2.03128E-01,-1.13814E-01,-3.19710E-02,
     * 9.56440E-03, 7.79247E-03,-1.18494E-02,-1.78280E-02,-4.79031E-03,
     * 3.40805E-02, 2.08164E-01, 4.63544E-01, 6.97040E-01, 8.27953E-01,
     * 8.15969E-01, 6.66600E-01, 4.24147E-01, 1.54993E-01,-7.37219E-02,
     *-2.14244E-01,-2.51061E-01,-2.03128E-01,-1.13814E-01,-3.19710E-02,
     * 9.56440E-03, 7.79247E-03,-1.18494E-02,-1.78280E-02,-4.79031E-03/
C
      DATA VK323/
     *-3.98933E-02,-2.47216E-01,-5.66642E-01,-8.91356E-01,-1.12864E 00,
     *-1.21422E 00,-1.12064E 00,-8.58907E-01,-4.74006E-01,-3.47300E-02,
     * 3.80013E-01, 6.97053E-01, 8.64157E-01, 8.62116E-01, 7.10200E-01,
     * 4.64838E-01, 2.07645E-01, 2.08015E-02,-4.54969E-02,-1.62268E-02,
     *-3.98933E-02,-2.47216E-01,-5.66642E-01,-8.91356E-01,-1.12864E 00,
     *-1.21422E 00,-1.12064E 00,-8.58907E-01,-4.74006E-01,-3.47300E-02,
     * 3.80013E-01, 6.97053E-01, 8.64157E-01, 8.62116E-01, 7.10200E-01,
     * 4.64838E-01, 2.07645E-01, 2.08015E-02,-4.54969E-02,-1.62268E-02,
     * 8.69521E-02, 5.32195E-01, 1.19021E 00, 1.80283E 00, 2.16673E 00,
     * 2.17725E 00, 1.84239E 00, 1.26684E 00, 6.12149E-01, 4.50659E-02,
     *-3.12407E-01,-4.16454E-01,-3.10239E-01,-9.97925E-02, 8.77342E-02,
     * 1.62755E-01, 1.15498E-01, 1.55096E-02,-4.04234E-02,-2.10257E-02,
     * 8.69521E-02, 5.32195E-01, 1.19021E 00, 1.80283E 00, 2.16673E 00,
     * 2.17725E 00, 1.84239E 00, 1.26684E 00, 6.12149E-01, 4.50659E-02,
     *-3.12407E-01,-4.16454E-01,-3.10239E-01,-9.97925E-02, 8.77342E-02,
     * 1.62755E-01, 1.15498E-01, 1.55096E-02,-4.04234E-02,-2.10257E-02/
C
      DATA VK324/
     *-1.08288E-01,-6.48297E-01,-1.38623E 00,-1.95399E 00,-2.11178E 00,
     *-1.81936E 00,-1.22435E 00,-5.80333E-01,-1.31161E-01,-8.37898E-03,
     *-1.82766E-01,-4.90416E-01,-7.21846E-01,-7.34316E-01,-5.28842E-01,
     *-2.40608E-01,-3.79152E-02,-1.47247E-03,-2.85263E-02,-9.08661E-03,
     *-1.08288E-01,-6.48297E-01,-1.38623E 00,-1.95399E 00,-2.11178E 00,
     *-1.81936E 00,-1.22435E 00,-5.80333E-01,-1.31161E-01,-8.37898E-03,
     *-1.82766E-01,-4.90416E-01,-7.21846E-01,-7.34316E-01,-5.28842E-01,
     *-2.40608E-01,-3.79152E-02,-1.47247E-03,-2.85263E-02,-9.08661E-03,
     * 4.71750E-03, 2.10496E-02, 2.64692E-02, 2.02691E-03,-6.07319E-02,
     *-1.61440E-01,-2.92736E-01,-4.42182E-01,-5.94245E-01,-7.32222E-01,
     *-8.40161E-01,-9.04524E-01,-9.15909E-01,-8.70142E-01,-7.69532E-01,
     *-6.23418E-01,-4.48473E-01,-2.68167E-01,-1.13118E-01,-1.80168E-02,
     * 4.71750E-03, 2.10496E-02, 2.64692E-02, 2.02691E-03,-6.07319E-02,
     *-1.61440E-01,-2.92736E-01,-4.42182E-01,-5.94245E-01,-7.32222E-01,
     *-8.40161E-01,-9.04524E-01,-9.15909E-01,-8.70142E-01,-7.69532E-01,
     *-6.23418E-01,-4.48473E-01,-2.68167E-01,-1.13118E-01,-1.80168E-02/
C
      DATA VK325/
     *-1.02834E-02,-4.53442E-02,-5.57244E-02,-4.43274E-03, 1.15881E-01,
     * 2.88102E-01, 4.78698E-01, 6.47222E-01, 7.56001E-01, 7.78461E-01,
     * 7.05114E-01, 5.46316E-01, 3.30803E-01, 1.00651E-01,-9.73387E-02,
     *-2.23350E-01,-2.55939E-01,-2.02026E-01,-1.00643E-01,-1.70870E-02,
     *-1.02834E-02,-4.53442E-02,-5.57244E-02,-4.43274E-03, 1.15881E-01,
     * 2.88102E-01, 4.78698E-01, 6.47222E-01, 7.56001E-01, 7.78461E-01,
     * 7.05114E-01, 5.46316E-01, 3.30803E-01, 1.00651E-01,-9.73387E-02,
     *-2.23350E-01,-2.55939E-01,-2.02026E-01,-1.00643E-01,-1.70870E-02,
     * 1.28090E-02, 5.53014E-02, 6.51777E-02, 5.51271E-03,-1.11469E-01,
     *-2.37978E-01,-3.13112E-01,-2.87243E-01,-1.41620E-01, 1.02345E-01,
     * 3.86344E-01, 6.31825E-01, 7.64474E-01, 7.41763E-01, 5.72019E-01,
     * 3.17759E-01, 7.60660E-02,-6.17952E-02,-7.20615E-02,-1.62411E-02,
     * 1.28090E-02, 5.53014E-02, 6.51777E-02, 5.51271E-03,-1.11469E-01,
     *-2.37978E-01,-3.13112E-01,-2.87243E-01,-1.41620E-01, 1.02345E-01,
     * 3.86344E-01, 6.31825E-01, 7.64474E-01, 7.41763E-01, 5.72019E-01,
     * 3.17759E-01, 7.60660E-02,-6.17952E-02,-7.20615E-02,-1.62411E-02/
C
      DATA VK326/
     *-8.52878E-02,-3.77305E-01,-4.66637E-01,-3.67467E-02, 9.97425E-01,
     * 2.52726E 00, 4.30595E 00, 6.01427E 00, 7.32868E 00, 7.98486E 00,
     * 7.82861E 00, 6.84993E 00, 5.19318E 00, 3.14156E 00, 1.07375E 00,
     *-6.08154E-01,-1.56468E 00,-1.64645E 00,-1.00708E 00,-2.10831E-01,
     *-8.52878E-02,-3.77305E-01,-4.66637E-01,-3.67467E-02, 9.97425E-01,
     * 2.52726E 00, 4.30595E 00, 6.01427E 00, 7.32868E 00, 7.98486E 00,
     * 7.82861E 00, 6.84993E 00, 5.19318E 00, 3.14156E 00, 1.07375E 00,
     *-6.08154E-01,-1.56468E 00,-1.64645E 00,-1.00708E 00,-2.10831E-01,
     * 1.85914E-01, 8.12794E-01, 9.82446E-01, 8.00419E-02,-1.90353E 00,
     *-4.51172E 00,-7.04536E 00,-8.81116E 00,-9.33716E 00,-8.50911E 00,
     *-6.59795E 00,-4.17030E 00,-1.91354E 00,-4.03137E-01, 9.84497E-02,
     *-2.47284E-01,-9.19464E-01,-1.25505E 00,-9.01001E-01,-2.20367E-01,
     * 1.85914E-01, 8.12794E-01, 9.82446E-01, 8.00419E-02,-1.90353E 00,
     *-4.51172E 00,-7.04536E 00,-8.81116E 00,-9.33716E 00,-8.50911E 00,
     *-6.59795E 00,-4.17030E 00,-1.91354E 00,-4.03137E-01, 9.84497E-02,
     *-2.47284E-01,-9.19464E-01,-1.25505E 00,-9.01001E-01,-2.20367E-01/
C
      DATA VK327/
     *-2.31575E-01,-9.91311E-01,-1.14923E 00,-9.89056E-02, 1.83185E 00,
     * 3.72995E 00, 4.61620E 00, 3.92549E 00, 1.77328E 00,-1.08309E 00,
     *-3.56602E 00,-4.75780E 00,-4.32482E 00,-2.68648E 00,-8.23746E-01,
     * 2.76219E-01, 2.17996E-01,-4.27224E-01,-6.10373E-01,-2.36117E-01,
     *-2.31575E-01,-9.91311E-01,-1.14923E 00,-9.89056E-02, 1.83185E 00,
     * 3.72995E 00, 4.61620E 00, 3.92549E 00, 1.77328E 00,-1.08309E 00,
     *-3.56602E 00,-4.75780E 00,-4.32482E 00,-2.68648E 00,-8.23746E-01,
     * 2.76219E-01, 2.17996E-01,-4.27224E-01,-6.10373E-01,-2.36117E-01,
     * 2.71039E-01, 1.17629E 00, 1.40074E 00, 1.16893E-01,-2.51397E 00,
     *-5.57531E 00,-7.79320E 00,-7.99115E 00,-5.49670E 00,-4.03793E-01,
     * 6.37041E 00, 1.32669E 01, 1.84716E 01, 2.04591E 01, 1.85268E 01,
     * 1.32146E 01, 6.37778E 00, 6.65253E-01,-1.61592E 00,-6.16379E-01,
     * 2.71039E-01, 1.17629E 00, 1.40074E 00, 1.16893E-01,-2.51397E 00,
     *-5.57531E 00,-7.79320E 00,-7.99115E 00,-5.49670E 00,-4.03793E-01,
     * 6.37041E 00, 1.32669E 01, 1.84716E 01, 2.04591E 01, 1.85268E 01,
     * 1.32146E 01, 6.37778E 00, 6.65253E-01,-1.61592E 00,-6.16379E-01/
C
      DATA VK328/
     *-5.90824E-01,-2.53409E 00,-2.94948E 00,-2.52532E-01, 4.80020E 00,
     * 9.96347E 00, 1.27763E 01, 1.17554E 01, 7.08092E 00, 5.42358E-01,
     *-5.22217E 00,-7.89711E 00,-6.59026E 00,-2.33476E 00, 2.32216E 00,
     * 4.66437E 00, 3.54576E 00, 3.73535E-01,-1.49820E 00,-6.03546E-01,
     *-5.90824E-01,-2.53409E 00,-2.94948E 00,-2.52532E-01, 4.80020E 00,
     * 9.96347E 00, 1.27763E 01, 1.17554E 01, 7.08092E 00, 5.42358E-01,
     *-5.22217E 00,-7.89711E 00,-6.59026E 00,-2.33476E 00, 2.32216E 00,
     * 4.66437E 00, 3.54576E 00, 3.73535E-01,-1.49820E 00,-6.03546E-01,
     * 7.35937E-01, 3.09092E 00, 3.45101E 00, 3.07926E-01,-4.62462E 00,
     *-8.25801E 00,-8.42112E 00,-5.32874E 00,-1.48769E 00,-1.32553E-01,
     *-3.09473E 00,-9.37990E 00,-1.54755E 01,-1.74987E 01,-1.39315E 01,
     *-7.20650E 00,-1.49905E 00,-8.39890E-01,-2.01555E 00,-3.89148E 00,
     * 7.35937E-01, 3.09092E 00, 3.45101E 00, 3.07926E-01,-4.62462E 00,
     *-8.25801E 00,-8.42112E 00,-5.32874E 00,-1.48769E 00,-1.32553E-01,
     *-3.09473E 00,-9.37990E 00,-1.54755E 01,-1.74987E 01,-1.39315E 01,
     *-7.20650E 00,-1.49905E 00,-8.39890E-01,-2.01555E 00,-3.89148E 00/
C
      DATA VK329/
     *-1.24315E-02,-2.13311E-02, 7.29254E-02, 2.81132E-01, 5.34669E-01,
     * 7.26861E-01, 7.46969E-01, 5.05869E-01,-4.68321E-02,-9.14386E-01,
     *-2.05324E 00,-3.38054E 00,-4.78995E 00,-6.17113E 00,-7.43668E 00,
     *-8.54604E 00,-9.53467E 00,-1.05365E 01,-1.18033E 01,-1.37114E 01,
     *-1.24315E-02,-2.13311E-02, 7.29254E-02, 2.81132E-01, 5.34669E-01,
     * 7.26861E-01, 7.46969E-01, 5.05869E-01,-4.68321E-02,-9.14386E-01,
     *-2.05324E 00,-3.38054E 00,-4.78995E 00,-6.17113E 00,-7.43668E 00,
     *-8.54604E 00,-9.53467E 00,-1.05365E 01,-1.18033E 01,-1.37114E 01,
     * 2.71038E-02, 4.61090E-02,-1.52544E-01,-5.67423E-01,-1.02485E 00,
     *-1.30187E 00,-1.22772E 00,-7.49059E-01, 4.77810E-02, 9.56712E-01,
     * 1.70328E 00, 2.01667E 00, 1.69930E 00, 6.75947E-01,-9.89491E-01,
     *-3.12432E 00,-5.52790E 00,-8.05427E 00,-1.06839E 01,-1.35107E 01,
     * 2.71038E-02, 4.61090E-02,-1.52544E-01,-5.67423E-01,-1.02485E 00,
     *-1.30187E 00,-1.22772E 00,-7.49059E-01, 4.77810E-02, 9.56712E-01,
     * 1.70328E 00, 2.01667E 00, 1.69930E 00, 6.75947E-01,-9.89491E-01,
     *-3.12432E 00,-5.52790E 00,-8.05427E 00,-1.06839E 01,-1.35107E 01/
C
      DATA VK32A/
     *-3.37717E-02,-5.65805E-02, 1.76300E-01, 6.12482E-01, 9.95585E-01,
     * 1.08491E 00, 8.15210E-01, 3.48715E-01, 1.24035E-02, 1.53106E-01,
     * 9.67977E-01, 2.38087E 00, 4.00648E 00, 5.25190E 00, 5.48820E 00,
     * 4.27089E 00, 1.45247E 00,-2.72832E 00,-7.88499E 00,-1.29957E 01,
     *-3.37717E-02,-5.65805E-02, 1.76300E-01, 6.12482E-01, 9.95585E-01,
     * 1.08491E 00, 8.15210E-01, 3.48715E-01, 1.24035E-02, 1.53106E-01,
     * 9.67977E-01, 2.38087E 00, 4.00648E 00, 5.25190E 00, 5.48820E 00,
     * 4.27089E 00, 1.45247E 00,-2.72832E 00,-7.88499E 00,-1.29957E 01,
     * 2.24780E-01, 3.83303E-01,-1.27969E 00,-4.80764E 00,-8.80992E 00,
     *-1.14084E 01,-1.10274E 01,-6.93706E 00, 4.98840E-01, 9.86337E 00,
     * 1.89877E 01, 2.54093E 01, 2.69103E 01, 2.19485E 01, 9.91325E 00,
     *-9.00591E 00,-3.43068E 01,-6.65159E 01,-1.08422E 02,-1.67760E 02,
     * 2.24780E-01, 3.83303E-01,-1.27969E 00,-4.80764E 00,-8.80992E 00,
     *-1.14084E 01,-1.10274E 01,-6.93706E 00, 4.98840E-01, 9.86337E 00,
     * 1.89877E 01, 2.54093E 01, 2.69103E 01, 2.19485E 01, 9.91325E 00,
     *-9.00591E 00,-3.43068E 01,-6.65159E 01,-1.08422E 02,-1.67760E 02/
C
      DATA VK32B/
     *-4.90078E-01,-8.28544E-01, 2.67695E 00, 9.70474E 00, 1.68906E 01,
     * 2.04407E 01, 1.81350E 01, 1.02811E 01,-4.90021E-01,-1.03417E 01,
     *-1.58188E 01,-1.52803E 01,-9.74837E 00,-2.69839E 00, 9.64569E-01,
     *-3.68756E 00,-2.03936E 01,-5.12944E 01,-9.86582E 01,-1.65604E 02,
     *-4.90078E-01,-8.28544E-01, 2.67695E 00, 9.70474E 00, 1.68906E 01,
     * 2.04407E 01, 1.81350E 01, 1.02811E 01,-4.90021E-01,-1.03417E 01,
     *-1.58188E 01,-1.52803E 01,-9.74837E 00,-2.69839E 00, 9.64569E-01,
     *-3.68756E 00,-2.03936E 01,-5.12944E 01,-9.86582E 01,-1.65604E 02,
     * 6.10646E-01, 1.01674E 00,-3.09408E 00,-1.04778E 01,-1.64158E 01,
     *-1.70491E 01,-1.20621E 01,-4.80339E 00,-1.70517E-01,-1.62187E 00,
     *-8.88544E 00,-1.78177E 01,-2.24842E 01,-1.87370E 01,-7.62558E 00,
     * 4.02956E 00, 4.32835E 00,-1.83790E 01,-7.28801E 01,-1.59363E 02,
     * 6.10646E-01, 1.01674E 00,-3.09408E 00,-1.04778E 01,-1.64158E 01,
     *-1.70491E 01,-1.20621E 01,-4.80339E 00,-1.70517E-01,-1.62187E 00,
     *-8.88544E 00,-1.78177E 01,-2.24842E 01,-1.87370E 01,-7.62558E 00,
     * 4.02956E 00, 4.32835E 00,-1.83790E 01,-7.28801E 01,-1.59363E 02/
C
      DATA VK32C/
     *-7.14551E-01,-1.20167E 00, 3.80011E 00, 1.34259E 01, 2.23988E 01,
     * 2.53609E 01, 2.02096E 01, 9.56165E 00, 8.69141E-02, 1.10626E-01,
     * 1.62334E 01, 5.02582E 01, 9.71845E 01, 1.45386E 02, 1.78805E 02,
     * 1.79804E 02, 1.31683E 02, 1.63027E 01,-1.96005E 02,-5.70039E 02,
     *-7.14551E-01,-1.20167E 00, 3.80011E 00, 1.34259E 01, 2.23988E 01,
     * 2.53609E 01, 2.02096E 01, 9.56165E 00, 8.69141E-02, 1.10626E-01,
     * 1.62334E 01, 5.02582E 01, 9.71845E 01, 1.45386E 02, 1.78805E 02,
     * 1.79804E 02, 1.31683E 02, 1.63027E 01,-1.96005E 02,-5.70039E 02,
     * 1.55791E 00, 2.59758E 00,-7.95022E 00,-2.71092E 01,-4.29678E 01,
     *-4.54867E 01,-3.32981E 01,-1.42170E 01,-2.02271E-01, 2.69623E-02,
     *-1.31601E 01,-2.95087E 01,-3.38708E 01,-1.56462E 01, 2.37747E 01,
     * 6.53185E 01, 7.50890E 01, 1.14084E 01,-1.78859E 02,-5.60889E 02,
     * 1.55791E 00, 2.59758E 00,-7.95022E 00,-2.71092E 01,-4.29678E 01,
     *-4.54867E 01,-3.32981E 01,-1.42170E 01,-2.02271E-01, 2.69623E-02,
     *-1.31601E 01,-2.95087E 01,-3.38708E 01,-1.56462E 01, 2.37747E 01,
     * 6.53185E 01, 7.50890E 01, 1.14084E 01,-1.78859E 02,-5.60889E 02/
C
      DATA VK32D/
     *-1.94120E 00,-3.18771E 00, 9.19074E 00, 2.92852E 01, 4.18106E 01,
     * 3.80355E 01, 2.22738E 01, 6.73241E 00, 2.37885E-01,-2.37839E-01,
     *-8.01181E 00,-3.56766E 01,-8.15421E 01,-1.23557E 02,-1.32718E 02,
     *-9.17927E 01,-2.30725E 01,-1.04155E 01,-1.45081E 02,-5.72044E 02,
     *-1.94120E 00,-3.18771E 00, 9.19074E 00, 2.92852E 01, 4.18106E 01,
     * 3.80355E 01, 2.22738E 01, 6.73241E 00, 2.37885E-01,-2.37839E-01,
     *-8.01181E 00,-3.56766E 01,-8.15421E 01,-1.23557E 02,-1.32718E 02,
     *-9.17927E 01,-2.30725E 01,-1.04155E 01,-1.45081E 02,-5.72044E 02/
C
C
      END
